Maple Tool 1

This tool is designed to be used with Activity 1 in Section 9.1.

We begin with a scatterplot of the original data. Note that the scatterplot  command is part of the statsplot  package within stats .

>	with(plots):with(stats): data1:=[1,2,3,5,7,14,21,28,35,42,49,56,63,70,77,84,91,98,105,112]; data2:=[3,6,9,15,20,36,49,60,67,75,79,83,86,89,91,93,95,96,97,97];

>	Plot1:=statplots[scatterplot](data1,data2, color=navy, xtickmarks=[20,40,60,80,100,120], ytickmarks=[25,50,75,100],view=[0..130,0..115]):%;

Enter your estimates for  and .

>	M:=???; r:=???; LA:=t->M*(1-exp(-r*t)); Plot2:=plot(LA(t),t=0..120,view=[0..130,0..115]):

>	display(Plot1,Plot2);

Now adjust  and  to obtain a good fit.

>